home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 2 / Apprentice-Release2.iso / Source Code / Pascal / Snippets / ScanDirectory / READ ME next >
Encoding:
Text File  |  1994-05-06  |  567 b   |  11 lines  |  [TEXT/R*ch]
  1. This unit contains a single procedure ScanDir.  Passing this a FSSpec will search
  2. all the files and folders in that directory.  It calls its the searching
  3. procedure ScanSubDir recursively for each sub directory in the initial directory
  4. until it has searched all files and folders.  Add your own code at the point
  5. below where it finds individual files.  Like most things this code was made
  6. possible by learning from others, I just put it all together in one unit for my
  7. own purposes and thought others might take advantage of it.
  8.  
  9. Chris Owen
  10. owen-christopher@yale.edu
  11.